home *** CD-ROM | disk | FTP | other *** search
/ Libris Britannia 4 / science library(b).zip / science library(b) / DJGPP / AECUR102.ZIP / contrib / curses / src / machine.c < prev    next >
C/C++ Source or Header  |  1990-03-09  |  438b  |  21 lines
  1. /**********************************************************************
  2.  *  
  3.  *  machine.c
  4.  *  
  5.  *  copyright (c) 1988,89,90 J. Alan Eldridge
  6.  *
  7.  *  get the machine id word from the ROM
  8.  *  
  9.  *********************************************************************/
  10.  
  11. #include "curses.h"
  12.  
  13. void
  14. get_machine_id(MACHINE_ID  *id_ptr)
  15. {
  16.     unsigned long id_long = 0xffff000e;
  17.  
  18.     *id_ptr = *(MACHINE_ID far *)id_long;
  19. }
  20.     
  21.